object fmPaymentReceived: TfmPaymentReceived
  Left = 0
  Top = 0
  Caption = 'Payment Received'
  ClientHeight = 446
  ClientWidth = 809
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poOwnerFormCenter
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  DesignSize = (
    809
    446)
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 5
    Width = 35
    Height = 13
    Caption = '&Invoice'
  end
  object Label2: TLabel
    Left = 8
    Top = 194
    Width = 32
    Height = 13
    Anchors = [akLeft, akBottom]
    Caption = 'Details'
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 24
    Width = 793
    Height = 153
    Anchors = [akLeft, akTop, akRight, akBottom]
    DataSource = DataModule1.dsInvoiceList
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    OnCellClick = DBGrid1CellClick
    OnKeyPress = DBGrid1KeyPress
    OnTitleClick = DBGrid1TitleClick
    Columns = <
      item
        Expanded = False
        FieldName = 'INVOICE_NO'
        Title.Caption = 'Invoice No.'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -11
        Title.Font.Name = 'Tahoma'
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'INVOICE_DUE_DATE'
        Title.Caption = 'Due Date'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -11
        Title.Font.Name = 'Tahoma'
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DATE_OF_SHOOT'
        Title.Caption = 'Date Shoot'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -11
        Title.Font.Name = 'Tahoma'
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'COMPANY_NAME'
        Title.Caption = 'Customer'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -11
        Title.Font.Name = 'Tahoma'
        Title.Font.Style = [fsBold]
        Width = 200
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR'
        Title.Caption = 'Summary'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -11
        Title.Font.Name = 'Tahoma'
        Title.Font.Style = [fsBold]
        Width = 290
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'TOTAL_AMOUNT'
        Title.Caption = 'Total Amount'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -11
        Title.Font.Name = 'Tahoma'
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PAID'
        Title.Caption = 'Paid'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PAYMENT_RECEIVED_DATE'
        Title.Caption = 'Payment Received Date'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PAYMENT_TYPE'
        Title.Caption = 'Payment Type'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PAYMENT_DETAILS'
        Title.Caption = 'Payment Details'
        Width = 140
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PAYMENT_REFERENCE'
        Title.Caption = 'Payment Ref.'
        Width = 70
        Visible = True
      end>
  end
  object DBGrid2: TDBGrid
    Left = 8
    Top = 213
    Width = 793
    Height = 102
    Anchors = [akLeft, akRight, akBottom]
    DataSource = DataModule1.dsInvoiceDetails
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'DESCRIPTION'
        Title.Caption = 'Description'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -11
        Title.Font.Name = 'Tahoma'
        Title.Font.Style = [fsBold]
        Width = 650
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'AMOUNT'
        Title.Caption = 'Amount'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -11
        Title.Font.Name = 'Tahoma'
        Title.Font.Style = [fsBold]
        Width = 58
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOC_DI'
        Title.Caption = 'FOC DI'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -11
        Title.Font.Name = 'Tahoma'
        Title.Font.Style = [fsBold]
        Visible = True
      end>
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 321
    Width = 793
    Height = 86
    Anchors = [akLeft, akRight, akBottom]
    Caption = '&Payment'
    TabOrder = 2
    DesignSize = (
      793
      86)
    object Label3: TLabel
      Left = 112
      Top = 25
      Width = 70
      Height = 13
      Caption = 'Received &Date'
    end
    object Label4: TLabel
      Left = 312
      Top = 25
      Width = 84
      Height = 13
      Caption = 'Amount &Received'
    end
    object Label5: TLabel
      Left = 538
      Top = 25
      Width = 69
      Height = 13
      Caption = 'Payment &Type'
    end
    object Label6: TLabel
      Left = 16
      Top = 57
      Width = 32
      Height = 13
      Anchors = [akLeft]
      Caption = 'Details'
    end
    object dtReceivedDate: TDateTimePicker
      Left = 188
      Top = 21
      Width = 97
      Height = 21
      Date = 41083.450166574070000000
      Time = 41083.450166574070000000
      TabOrder = 1
    end
    object txtAmountReceived: TEdit
      Left = 408
      Top = 22
      Width = 97
      Height = 21
      Alignment = taRightJustify
      TabOrder = 2
      Text = '0.00'
      OnExit = txtAmountReceivedExit
      OnKeyPress = txtAmountReceivedKeyPress
    end
    object dbcbPaymentType: TDBLookupComboBox
      Left = 613
      Top = 21
      Width = 118
      Height = 21
      KeyField = 'NAME'
      ListField = 'DSC'
      ListSource = DataModule1.dsPaymentType
      TabOrder = 3
      OnDropDown = dbcbPaymentTypeDropDown
    end
    object chkReceived: TCheckBox
      Left = 16
      Top = 24
      Width = 73
      Height = 17
      Caption = '&Received'
      TabOrder = 0
      OnClick = chkReceivedClick
    end
    object txtPaymentDetails: TEdit
      Left = 56
      Top = 54
      Width = 721
      Height = 21
      Anchors = [akLeft, akTop, akRight]
      MaxLength = 255
      TabOrder = 4
    end
  end
  object btnUpdate: TButton
    Left = 629
    Top = 413
    Width = 75
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = '&Update'
    TabOrder = 3
    OnClick = btnUpdateClick
  end
  object btnClose: TButton
    Left = 726
    Top = 413
    Width = 75
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = '&Close'
    TabOrder = 4
    OnClick = btnCloseClick
  end
end
